proc core {nick host handle} {
  global botnick home bcast

  putlog "!$nick ($host)! core"
  putquick "NOTICE $nick :\0033Success - \002Preparing for shutdown in 20 seconds."
  putquick "PRIVMSG $home :\00312\002$nick\002\0034 (\0033$host\0034) requested me to shutdown (die).  I will shutdown within 20 seconds."

  foreach chan [channels] {  
    putquick "PRIVMSG $chan :\00312\002$nick\002\0034 requested me to shutdown within the next 20 seconds."
  }

  utimer 20 "die $handle"

}









